#include <stdio.h>
#include <stdlib.h>

#include "SDL/SDL.h"
#include <string>
#include "SDL/SDL_image.h"
#include "SDL/SDL_ttf.h"
#include "SDL/SDL_mixer.h"
#include <sstream>

#undef main

//窗口属性
const int SCREEN_WIDTH = 640;
const int SCREEN_HEIGHT = 480;
const int SCREEN_BPP = 32;

//将要使用的表面
SDL_Surface *image = NULL;
SDL_Surface *screen = NULL;
SDL_Surface *startStop = NULL;
SDL_Surface *pauseMessage = NULL;

//将要用到的事件结构体
SDL_Event event;

//将要用到的字体
TTF_Font *font = NULL;

//字体的颜色
SDL_Color textColor = { 255, 255, 255 };

//Timer类
class Timer
{
private:
    //计时器启动时的时间
    int startTicks;

    //计时器暂停时保存的滴答数
    int pausedTicks;

    //计时器状态
    bool paused;
    bool started;

public:
    //初始化变量
    Timer();

    //各种时钟动作
    void start();
    void stop();
    void pause();
    void unpause();

    //获取计时器时间
    int get_ticks();

    //检查计时器状态
    bool is_started();
    bool is_paused();
};

Timer::Timer()
{
    //初始化各种变量
    startTicks = 0;
    pausedTicks = 0;
    paused = false;
    started = false;
}

void Timer::start()
{
    //启动计时器
    started = true;

    //将计时器设为非暂停状态
    paused = false;

    //获取当前时钟时间
    startTicks = SDL_GetTicks();
}

void Timer::stop()
{
    //停止计时器
    started = false;

    //将计时器设为非暂停状态
    paused = false;
}

int Timer::get_ticks()
{
    //如果计时器正在运行
    if( started == true )
    {
        //如果计时器暂停中
        if( paused == true )
        {
            //返回计时器暂停时的滴答数
            return pausedTicks;
        }
        else
        {
            //返回当前时间减去启动时间的差值
            return SDL_GetTicks() - startTicks;
        }
    }

    //如果计时器没有在运行
    return 0;
}

void Timer::pause()
{
    //如果计时器正在运行但没有暂停
    if( ( started == true ) && ( paused == false ) )
    {
        //暂停计时器
        paused = true;

        //计算暂停时的滴答数
        pausedTicks = SDL_GetTicks() - startTicks;
    }
}

void Timer::unpause()
{
    //如果计时器暂停中
    if( paused == true )
    {
        //取消暂停
        paused = false;

        //重置开始时间
        startTicks = SDL_GetTicks() - pausedTicks;

        //重置暂停时间
        pausedTicks = 0;
    }
}

bool Timer::is_started()
{
    return started;
}

bool Timer::is_paused()
{
    return paused;
}

SDL_Surface *load_image( std::string filename )
{
    //临时的空间，用于存储刚刚加载好的图像
    SDL_Surface* loadedImage = NULL;

    //优化后的图像，实际使用的是这个图像
    SDL_Surface* optimizedImage = NULL;

    //加载图像
    loadedImage = IMG_Load(filename.c_str() );

    //如果加载图片没有出错
    if( loadedImage != NULL )
    {
        //创建一个优化了的图像
        optimizedImage = SDL_DisplayFormat( loadedImage );

        //释放临时的图像
        SDL_FreeSurface( loadedImage );
    }

    //如果图像优化成功
    //    if( optimizedImage != NULL )
    //    {
    //        //映射关键色
    //        Uint32 colorkey = SDL_MapRGB( optimizedImage->format, 0, 0xFF, 0xFF );

    //        //将所有颜色为（R 0, G 0xFF, B 0xFF）的像素设为透明。
    //        SDL_SetColorKey( optimizedImage, SDL_SRCCOLORKEY, colorkey );
    //    }

    //返回优化后的表面
    return optimizedImage;
}

void apply_surface( int x, int y, SDL_Surface* source, SDL_Surface* destination, SDL_Rect* clip = NULL )
{
    //新建一个临时的矩形来保存偏移量
    SDL_Rect offset;

    //将传入的偏移量保存到矩形中
    offset.x = x;
    offset.y = y;
    //执行表面的Blit
    SDL_BlitSurface( source, clip, destination, &offset );
}

bool load_files()
{
    //加载图像
    image = load_image( "../lesson13/background.png" );

    //打开字体
    font = TTF_OpenFont( "../lesson13/Garuda.ttf", 28 );

    //如果加载出错
    if( image == NULL )
    {
        return false;
    }

    //如果字体加载出错
    if( font == NULL )
    {
        return false;
    }

    //如果所有图片加载正常
    return true;
}

void clean_up()
{
    //释放图像
    SDL_FreeSurface( image );

    //关闭字体
    TTF_CloseFont( font );

    //退出SDL_ttf
    TTF_Quit();

    //退出SDL
    SDL_Quit();
}

bool init()
{
    //初始化SDL的所有子系统
    if( SDL_Init( SDL_INIT_EVERYTHING ) == -1 )
    {
        return false;
    }

    //设置窗口
    screen = SDL_SetVideoMode( SCREEN_WIDTH, SCREEN_HEIGHT, SCREEN_BPP, SDL_SWSURFACE );

    //如果设置出错
    if( screen == NULL )
    {
        return false;
    }

    //初始化SDL_ttf
    if( TTF_Init() == -1 )
    {
        return false;
    }

    //设置窗口标题
    SDL_WM_SetCaption( "高级计时", NULL );

    //如果所有初始化操作都成功
    return true;
}

int main(int argc, char *argv[])
{
    printf("hello\n");

    //确保程序一直等待quit
    bool quit = false;

    //计时器启动时间
    Uint32 start = 0;

    //计时器的启动/停止标志
    bool running = true;

    //初始化
    if( init() == false )
    {
        return 1;
    }

    //加载文件
    if( load_files() == false )
    {
        return 1;
    }

    //用白色填充窗口
    SDL_FillRect( screen, &screen->clip_rect, SDL_MapRGB( screen->format, 0xFF, 0xFF, 0xFF ) );

    //新建计时器
    Timer myTimer;

    //启动计时器
    myTimer.start();

    //当用户还不想退出时
    while( quit == false )
    {
        //当有事件发生时，我们需要处理它们
        while( SDL_PollEvent( &event ) )
        {

            //如果用户点击了窗口右上角的关闭按钮
            if( event.type == SDL_QUIT )
            {
                //退出程序
                quit = true;
            }

            //如果一个按键被按下
            if( event.type == SDL_KEYDOWN )
            {
                //如果数字键“1”被按下
                if( event.key.keysym.sym == SDLK_s )
                {

                    //如果计时器在运行
                    if( myTimer.is_started() == true )
                    {
                        //停止计时器
                        myTimer.stop();
                    }
                    else
                    {
                        //启动计时器
                        myTimer.start();
                    }
                }
                //如果“p”被按下
                if( event.key.keysym.sym == SDLK_p )
                {
                    //如果计时器暂停中
                    if( myTimer.is_paused() == true )
                    {
                        //取消暂停
                        myTimer.unpause();
                    }
                    else
                    {
                        //暂停计时器
                        myTimer.pause();
                    }
                }
            }

        }

        //将image表面应用到窗口上
        apply_surface( 0, 0, image, screen);

        //生成信息表面
        startStop = TTF_RenderText_Solid( font, "Press S to start or stop the timer", textColor );
        //应用时间表面
        apply_surface( ( SCREEN_WIDTH - startStop->w ) / 2, 100, startStop, screen );

        SDL_FreeSurface( startStop );

        pauseMessage = TTF_RenderText_Solid( font, "Press P to pause or unpause the timer", textColor );

        //应用时间表面
        apply_surface( ( SCREEN_WIDTH - pauseMessage->w ) / 2, 200, pauseMessage, screen );

        SDL_FreeSurface( pauseMessage );

        //以string形式存储的计时器时间
        std::stringstream time;

        //将计时器的时间转换为字符串
        time << "Timer: " << myTimer.get_ticks() / 1000.f;

        //渲染时间表面
        pauseMessage = TTF_RenderText_Solid( font, time.str().c_str(), textColor );

        //应用时间表面
        apply_surface( ( SCREEN_WIDTH - pauseMessage->w ) / 2, 0, pauseMessage, screen );

        //释放时间表面
        SDL_FreeSurface( pauseMessage );

        //如果计时器正在运行
        if( running == true )
        {
            //将计时器时间转换为string
            time << "Timer: " << SDL_GetTicks() - start;
        }
        else{
            time << "Timer: 0" ;
        }

        //更新窗口
        if( SDL_Flip( screen ) == -1 )
        {
            return 1;
        }
        SDL_Delay(20);
    }

    //清理表面并退出SDL
    clean_up();

    return 0;
}
